home *** CD-ROM | disk | FTP | other *** search
/ Amiga Tools 4 / Amiga Tools 4.iso / patches / organizer / org1.1update / install-organizer1.1 < prev    next >
Encoding:
Text File  |  1996-02-26  |  1.6 KB  |  42 lines
  1. ;ORGANIZER 1.1 ONLINE UPDATE PATCH INSTALLATION SCRIPT
  2. ;COPYRIGHT ©1995 DIGITA INTERNATIONAL AND SOFT-LOGIK PUBLISHING CORPORATION
  3.  
  4. (message "\n\nThis will update your hard drive installation of Organizer 1.0 to version 1.1. It requires that Organizer 1.0 be installed on your hard drive.\n\nYour original Organizer disk will not be modified by this update.")
  5.  
  6. ;GET ORGANIZER DIRECTORY
  7. (set ORGdest
  8.     (askdir
  9.         (prompt
  10.             "Where is Organizer installed?\n "
  11.             "Click on the Organizer drawer.\n")
  12.                 (help
  13.             "\n\nYou must select the Organizer drawer so that "
  14.             "this installer can update the installation.")
  15.                 (default @default-dest)
  16.         )
  17. )
  18. (set temp (tackon ORGdest "Organizer"))
  19. (if (<> (exists temp) 1)
  20.     (abort "Organizer 1.0 is not located in this directory.")
  21. )
  22. (set @default-dest ORGdest)
  23. (makeassign "Organizer" ORGdest (safe))
  24.  
  25. ;UPDATE Organizer
  26. (working "\n\nPatching Organizer 1.0 to 1.1...")
  27. (run "spatch >NIL: <NIL: -oOrganizer:Organizer1.1 -pOrganizer.pch Organizer:Organizer")
  28. (if (exists "Organizer:Organizer1.1")
  29.     (
  30.         (delete "Organizer:Organizer")
  31.         (rename "Organizer:Organizer1.1" "Organizer:Organizer")
  32.         (copyfiles (source "Organiser.catalog") (dest "Organizer:Catalogs/English"))
  33.         (copyfiles (source "Canada Public Holidays 96") (dest ORGdest))
  34.         (copyfiles (source "USA Public Holidays 96") (dest ORGdest))
  35.     (message "Your new 1996 themes can be found in the Organizer directory.")
  36.     )
  37.     (abort "Patch was not successful. Organizer file could not be patched due to incorrect version, lack of hard drive space, or RAM.")
  38. )
  39.  
  40. ;ALL DONE
  41. (exit "Organizer updated to version 1.1!")
  42.